/* osptrs.h - system specific function pointers */


#if !(defined(UNIX) || defined(WINTERP))
{   "GET-KEY",  S,  xgetkey },
#endif /* !(defined(UNIX) || defined(WINTERP)) */

#ifdef GRAPHICS
{   "CLS",      S,  xcls    },
{   "GOTO-XY",  S,  xgotoxy },
{   "CLEOL",    S,  xcleol  },
{   "MODE",     S,  xmode   },
{   "COLOR",    S,  xcolor  },
{   "MOVE",     S,  xmove   },
{   "DRAW",     S,  xdraw   },
{   "MOVEREL",  S,  xmoverel},
{   "DRAWREL",  S,  xdrawrel},
#endif

#if (defined(UNIX) || defined(WINTERP))
{   "SYSTEM",                   S, Prim_SYSTEM  },
{   "POPEN",                    S, Prim_POPEN   },
{   "PCLOSE",                   S, Prim_PCLOSE  },
{   "FSCANF-FIXNUM",            S, Prim_FSCANF_FIXNUM   },
{   "FSCANF-STRING",            S, Prim_FSCANF_STRING   },
{   "FSCANF-FLONUM",            S, Prim_FSCANF_FLONUM   },
#else
{   "SYSTEM",   S,  xsystem },
#endif /* (defined(UNIX) || defined(WINTERP)) */
